home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1999 July: Mac OS SDK / Dev.CD Jul 99 SDK1.toast / Development Kits / Mac OS / Interfaces&Libraries / Universal / Interfaces / AIncludes / Editions.a < prev    next >
Encoding:
Text File  |  1998-08-17  |  17.8 KB  |  621 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        Editions.a
  3. ;
  4. ;    Contains:    Edition Manager Interfaces.
  5. ;
  6. ;    Version:    Technology:    System 7.5
  7. ;                Release:    Universal Interfaces 3.2
  8. ;
  9. ;    Copyright:    © 1989-1998 by Apple Computer, Inc., all rights reserved
  10. ;
  11. ;    Bugs?:        For bug reports, consult the following page on
  12. ;                the World Wide Web:
  13. ;
  14. ;                    http://developer.apple.com/bugreporter/
  15. ;
  16. ;
  17.     IF &TYPE('__EDITIONS__') = 'UNDEFINED' THEN
  18. __EDITIONS__ SET 1
  19.  
  20.     IF &TYPE('__MACTYPES__') = 'UNDEFINED' THEN
  21.     include 'MacTypes.a'
  22.     ENDIF
  23.     IF &TYPE('__MIXEDMODE__') = 'UNDEFINED' THEN
  24.     include 'MixedMode.a'
  25.     ENDIF
  26.     IF &TYPE('__FILES__') = 'UNDEFINED' THEN
  27.     include 'Files.a'
  28.     ENDIF
  29.     IF &TYPE('__ALIASES__') = 'UNDEFINED' THEN
  30.     include 'Aliases.a'
  31.     ENDIF
  32.     IF &TYPE('__DIALOGS__') = 'UNDEFINED' THEN
  33.     include 'Dialogs.a'
  34.     ENDIF
  35.  
  36.  
  37.                                                             ; resource types  
  38. rSectionType                    EQU        'sect'                ; ResType of saved SectionRecords 
  39.                                                             ; Finder types for edition files 
  40. kPICTEditionFileType            EQU        'edtp'
  41. kTEXTEditionFileType            EQU        'edtt'
  42. ksndEditionFileType                EQU        'edts'
  43. kUnknownEditionFileType            EQU        'edtu'
  44. kPublisherDocAliasFormat        EQU        'alis'
  45. kPreviewFormat                    EQU        'prvw'
  46. kFormatListFormat                EQU        'fmts'
  47.  
  48.                                                             ; section types 
  49. stSubscriber                    EQU        $01
  50. stPublisher                        EQU        $0A
  51.  
  52. sumAutomatic                    EQU        0                    ; subscriber update mode - Automatically     
  53. sumManual                        EQU        1                    ; subscriber update mode - Manually 
  54. pumOnSave                        EQU        0                    ; publisher update mode - OnSave            
  55. pumManual                        EQU        1                    ; publisher update mode - Manually 
  56.  
  57. kPartsNotUsed                    EQU        0
  58. kPartNumberUnknown                EQU        -1
  59.  
  60. kPreviewWidth                    EQU        120
  61. kPreviewHeight                    EQU        120
  62.  
  63.                                                             ; bits for formatsMask 
  64. kPICTformatMask                    EQU        1
  65. kTEXTformatMask                    EQU        2
  66. ksndFormatMask                    EQU        4
  67.  
  68.  
  69.                                                             ; pseudo-item hits for dialogHooks the first is for NewPublisher or NewSubscriber Dialogs 
  70. emHookRedrawPreview                EQU        150                    ; the following are for SectionOptions Dialog 
  71. emHookCancelSection                EQU        160
  72. emHookGoToPublisher                EQU        161
  73. emHookGetEditionNow                EQU        162
  74. emHookSendEditionNow            EQU        162
  75. emHookManualUpdateMode            EQU        163
  76. emHookAutoUpdateMode            EQU        164
  77.  
  78.  
  79.                                                             ; the refcon field of the dialog record during a modalfilter or dialoghook contains one the following 
  80. emOptionsDialogRefCon            EQU        'optn'
  81. emCancelSectionDialogRefCon        EQU        'cncl'
  82. emGoToPubErrDialogRefCon        EQU        'gerr'
  83.  
  84. kFormatLengthUnknown            EQU        -1
  85. ;  one byte, stSubscriber or stPublisher 
  86. ; typedef SignedByte                     SectionType
  87.  
  88. ;  seconds since 1904 
  89. ; typedef unsigned long                 TimeStamp
  90.  
  91. ;  similar to ResType 
  92. ; typedef FourCharCode                     FormatType
  93.  
  94. ;  used in Edition I/O 
  95. ; typedef Handle                         EditionRefNum
  96.  
  97. ;  update modes 
  98. ;  sumAutomatic, pumSuspend, etc 
  99. ; typedef short                         UpdateMode
  100.  
  101.  
  102.  
  103. ; typedef SectionRecord *                SectionPtr
  104.  
  105. ; typedef SectionPtr *                    SectionHandle
  106.  
  107. SectionRecord            RECORD 0
  108. version                     ds.b    1                ; offset: $0 (0)        ;  always 0x01 in system 7.0 
  109. kind                     ds.b    1                ; offset: $1 (1)        ;  stSubscriber or stPublisher 
  110. mode                     ds.w    1                ; offset: $2 (2)        ;  auto or manual 
  111. mdDate                     ds.l    1                ; offset: $4 (4)        ;  last change in document 
  112. sectionID                 ds.l    1                ; offset: $8 (8)        ;  app. specific, unique per document 
  113. refCon                     ds.l    1                ; offset: $C (12)        ;  application specific 
  114. alias                     ds.l    1                ; offset: $10 (16)        ;  handle to Alias Record 
  115. subPart                     ds.l    1                ; offset: $14 (20)        ;  which part of container file 
  116. nextSection                 ds.l    1                ; offset: $18 (24)        ;  for linked list of app's Sections 
  117. controlBlock             ds.l    1                ; offset: $1C (28)        ;  used internally 
  118. refNum                     ds.l    1                ; offset: $20 (32)        ;  used internally 
  119. sizeof                     EQU *                    ; size:   $24 (36)
  120.                         ENDR
  121. EditionContainerSpec    RECORD 0
  122. theFile                     ds        FSSpec            ; offset: $0 (0)
  123. theFileScript             ds.w    1                ; offset: $46 (70)
  124. thePart                     ds.l    1                ; offset: $48 (72)
  125. thePartName                 ds        Str31            ; offset: $4C (76)
  126. thePartScript             ds.w    1                ; offset: $6C (108)
  127. sizeof                     EQU *                    ; size:   $6E (110)
  128.                         ENDR
  129. ; typedef struct EditionContainerSpec *    EditionContainerSpecPtr
  130.  
  131. EditionInfoRecord        RECORD 0
  132. crDate                     ds.l    1                ; offset: $0 (0)        ;  date EditionContainer was created 
  133. mdDate                     ds.l    1                ; offset: $4 (4)        ;  date of last change 
  134. fdCreator                 ds.l    1                ; offset: $8 (8)        ;  file creator 
  135. fdType                     ds.l    1                ; offset: $C (12)        ;  file type 
  136. container                 ds        EditionContainerSpec ; offset: $10 (16) ;  the Edition 
  137. sizeof                     EQU *                    ; size:   $7E (126)
  138.                         ENDR
  139. NewPublisherReply        RECORD 0
  140. canceled                 ds.b    1                ; offset: $0 (0)        ;  O 
  141. replacing                 ds.b    1                ; offset: $1 (1)
  142. usePart                     ds.b    1                ; offset: $2 (2)        ;  I 
  143. filler                     ds.b    1                ; offset: $3 (3)
  144. preview                     ds.l    1                ; offset: $4 (4)        ;  I 
  145. previewFormat             ds.l    1                ; offset: $8 (8)        ;  I 
  146. container                 ds        EditionContainerSpec ; offset: $C (12) ;  I/O 
  147. sizeof                     EQU *                    ; size:   $7A (122)
  148.                         ENDR
  149. NewSubscriberReply        RECORD 0
  150. canceled                 ds.b    1                ; offset: $0 (0)        ;  O 
  151. formatsMask                 ds.b    1                ; offset: $1 (1)
  152. container                 ds        EditionContainerSpec ; offset: $2 (2)    ; I/O
  153. sizeof                     EQU *                    ; size:   $70 (112)
  154.                         ENDR
  155. SectionOptionsReply        RECORD 0
  156. canceled                 ds.b    1                ; offset: $0 (0)        ;  O 
  157. changed                     ds.b    1                ; offset: $1 (1)        ;  O 
  158. sectionH                 ds.l    1                ; offset: $2 (2)        ;  I 
  159. action                     ds.l    1                ; offset: $6 (6)        ;  O 
  160. sizeof                     EQU *                    ; size:   $A (10)
  161.                         ENDR
  162.  
  163. ioHasFormat                        EQU        0
  164. ioReadFormat                    EQU        1
  165. ioNewFormat                        EQU        2
  166. ioWriteFormat                    EQU        3
  167. ; typedef SignedByte                     FormatIOVerb
  168.  
  169.  
  170. eoOpen                            EQU        0
  171. eoClose                            EQU        1
  172. eoOpenNew                        EQU        2
  173. eoCloseNew                        EQU        3
  174. eoCanSubscribe                    EQU        4
  175. ; typedef SignedByte                     EditionOpenerVerb
  176.  
  177. FormatIOParamBlock        RECORD 0
  178. ioRefNum                 ds.l    1                ; offset: $0 (0)
  179. format                     ds.l    1                ; offset: $4 (4)
  180. formatIndex                 ds.l    1                ; offset: $8 (8)
  181. offset                     ds.l    1                ; offset: $C (12)
  182. buffPtr                     ds.l    1                ; offset: $10 (16)
  183. buffLen                     ds.l    1                ; offset: $14 (20)
  184. sizeof                     EQU *                    ; size:   $18 (24)
  185.                         ENDR
  186.  
  187.  
  188. EditionOpenerParamBlock    RECORD 0
  189. info                     ds        EditionInfoRecord ; offset: $0 (0)
  190. sectionH                 ds.l    1                ; offset: $7E (126)
  191. document                 ds.l    1                ; offset: $82 (130)
  192. fdCreator                 ds.l    1                ; offset: $86 (134)
  193. ioRefNum                 ds.l    1                ; offset: $8A (138)
  194. ioProc                     ds.l    1                ; offset: $8E (142)
  195. success                     ds.b    1                ; offset: $92 (146)
  196. formatsMask                 ds.b    1                ; offset: $93 (147)
  197. sizeof                     EQU *                    ; size:   $94 (148)
  198.                         ENDR
  199. ;  
  200. ; Section events now arrive in the message buffer using the AppleEvent format.
  201. ; The direct object parameter is an aeTemporaryIDParamType ('tid '). The temporary
  202. ; ID's type is rSectionType ('sect') and the 32-bit value is a SectionHandle.
  203. ; The following is a sample buffer
  204. ; 
  205. ; name       offset     contents
  206. ; ----       ------     --------
  207. ; header           0      'aevt'
  208. ; majorVersion     4      0x01
  209. ; minorVersion     6      0x01
  210. ; endOfMetaData     8      ';;;;' 
  211. ; directObjKey     12  '----' 
  212. ; paramType      16  'tid ' 
  213. ; paramLength      20  0x0008 
  214. ; tempIDType      24  'sect' 
  215. ; tempID            28  the SectionHandle <-- this is want you want
  216. ;
  217.  
  218.  
  219.  
  220. sectionEventMsgClass            EQU        'sect'
  221. sectionReadMsgID                EQU        'read'
  222. sectionWriteMsgID                EQU        'writ'
  223. sectionScrollMsgID                EQU        'scrl'
  224. sectionCancelMsgID                EQU        'cncl'
  225.  
  226. currentEditionMgrVers            EQU        $0011
  227.  
  228.  
  229. ;
  230. ; pascal OSErr InitEditionPackVersion(short curEditionMgrVers)
  231. ;
  232.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  233.         Macro
  234.         _InitEditionPackVersion
  235.             move.w              #$0100,D0
  236.             dc.w                $A82D
  237.         EndM
  238.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  239.         IMPORT_CFM_FUNCTION InitEditionPackVersion
  240.     ENDIF
  241.  
  242. ;
  243. ; pascal OSErr NewSection(const EditionContainerSpec *container, ConstFSSpecPtr sectionDocument, SectionType kind, long sectionID, UpdateMode initalMode, SectionHandle *sectionH)
  244. ;
  245.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  246.         Macro
  247.         _NewSection
  248.             move.w              #$0A02,D0
  249.             dc.w                $A82D
  250.         EndM
  251.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  252.         IMPORT_CFM_FUNCTION NewSection
  253.     ENDIF
  254.  
  255. ;
  256. ; pascal OSErr RegisterSection(const FSSpec *sectionDocument, SectionHandle sectionH, Boolean *aliasWasUpdated)
  257. ;
  258.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  259.         Macro
  260.         _RegisterSection
  261.             move.w              #$0604,D0
  262.             dc.w                $A82D
  263.         EndM
  264.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  265.         IMPORT_CFM_FUNCTION RegisterSection
  266.     ENDIF
  267.  
  268. ;
  269. ; pascal OSErr UnRegisterSection(SectionHandle sectionH)
  270. ;
  271.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  272.         Macro
  273.         _UnRegisterSection
  274.             move.w              #$0206,D0
  275.             dc.w                $A82D
  276.         EndM
  277.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  278.         IMPORT_CFM_FUNCTION UnRegisterSection
  279.     ENDIF
  280.  
  281. ;
  282. ; pascal OSErr IsRegisteredSection(SectionHandle sectionH)
  283. ;
  284.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  285.         Macro
  286.         _IsRegisteredSection
  287.             move.w              #$0208,D0
  288.             dc.w                $A82D
  289.         EndM
  290.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  291.         IMPORT_CFM_FUNCTION IsRegisteredSection
  292.     ENDIF
  293.  
  294. ;
  295. ; pascal OSErr AssociateSection(SectionHandle sectionH, const FSSpec *newSectionDocument)
  296. ;
  297.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  298.         Macro
  299.         _AssociateSection
  300.             move.w              #$040C,D0
  301.             dc.w                $A82D
  302.         EndM
  303.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  304.         IMPORT_CFM_FUNCTION AssociateSection
  305.     ENDIF
  306.  
  307. ;
  308. ; pascal OSErr CreateEditionContainerFile(const FSSpec *editionFile, OSType fdCreator, ScriptCode editionFileNameScript)
  309. ;
  310.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  311.         Macro
  312.         _CreateEditionContainerFile
  313.             move.w              #$050E,D0
  314.             dc.w                $A82D
  315.         EndM
  316.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  317.         IMPORT_CFM_FUNCTION CreateEditionContainerFile
  318.     ENDIF
  319.  
  320. ;
  321. ; pascal OSErr DeleteEditionContainerFile(const FSSpec *editionFile)
  322. ;
  323.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  324.         Macro
  325.         _DeleteEditionContainerFile
  326.             move.w              #$0210,D0
  327.             dc.w                $A82D
  328.         EndM
  329.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  330.         IMPORT_CFM_FUNCTION DeleteEditionContainerFile
  331.     ENDIF
  332.  
  333. ;
  334. ; pascal OSErr OpenEdition(SectionHandle subscriberSectionH, EditionRefNum *refNum)
  335. ;
  336.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  337.         Macro
  338.         _OpenEdition
  339.             move.w              #$0412,D0
  340.             dc.w                $A82D
  341.         EndM
  342.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  343.         IMPORT_CFM_FUNCTION OpenEdition
  344.     ENDIF
  345.  
  346. ;
  347. ; pascal OSErr OpenNewEdition(SectionHandle publisherSectionH, OSType fdCreator, ConstFSSpecPtr publisherSectionDocument, EditionRefNum *refNum)
  348. ;
  349.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  350.         Macro
  351.         _OpenNewEdition
  352.             move.w              #$0814,D0
  353.             dc.w                $A82D
  354.         EndM
  355.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  356.         IMPORT_CFM_FUNCTION OpenNewEdition
  357.     ENDIF
  358.  
  359. ;
  360. ; pascal OSErr CloseEdition(EditionRefNum whichEdition, Boolean successful)
  361. ;
  362.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  363.         Macro
  364.         _CloseEdition
  365.             move.w              #$0316,D0
  366.             dc.w                $A82D
  367.         EndM
  368.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  369.         IMPORT_CFM_FUNCTION CloseEdition
  370.     ENDIF
  371.  
  372. ;
  373. ; pascal OSErr EditionHasFormat(EditionRefNum whichEdition, FormatType whichFormat, Size *formatSize)
  374. ;
  375.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  376.         Macro
  377.         _EditionHasFormat
  378.             move.w              #$0618,D0
  379.             dc.w                $A82D
  380.         EndM
  381.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  382.         IMPORT_CFM_FUNCTION EditionHasFormat
  383.     ENDIF
  384.  
  385. ;
  386. ; pascal OSErr ReadEdition(EditionRefNum whichEdition, FormatType whichFormat, void *buffPtr, Size *buffLen)
  387. ;
  388.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  389.         Macro
  390.         _ReadEdition
  391.             move.w              #$081A,D0
  392.             dc.w                $A82D
  393.         EndM
  394.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  395.         IMPORT_CFM_FUNCTION ReadEdition
  396.     ENDIF
  397.  
  398. ;
  399. ; pascal OSErr WriteEdition(EditionRefNum whichEdition, FormatType whichFormat, const void *buffPtr, Size buffLen)
  400. ;
  401.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  402.         Macro
  403.         _WriteEdition
  404.             move.w              #$081C,D0
  405.             dc.w                $A82D
  406.         EndM
  407.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  408.         IMPORT_CFM_FUNCTION WriteEdition
  409.     ENDIF
  410.  
  411. ;
  412. ; pascal OSErr GetEditionFormatMark(EditionRefNum whichEdition, FormatType whichFormat, unsigned long *currentMark)
  413. ;
  414.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  415.         Macro
  416.         _GetEditionFormatMark
  417.             move.w              #$061E,D0
  418.             dc.w                $A82D
  419.         EndM
  420.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  421.         IMPORT_CFM_FUNCTION GetEditionFormatMark
  422.     ENDIF
  423.  
  424. ;
  425. ; pascal OSErr SetEditionFormatMark(EditionRefNum whichEdition, FormatType whichFormat, unsigned long setMarkTo)
  426. ;
  427.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  428.         Macro
  429.         _SetEditionFormatMark
  430.             move.w              #$0620,D0
  431.             dc.w                $A82D
  432.         EndM
  433.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  434.         IMPORT_CFM_FUNCTION SetEditionFormatMark
  435.     ENDIF
  436.  
  437. ;
  438. ; pascal OSErr GetEditionInfo(SectionHandle sectionH, EditionInfoRecord *editionInfo)
  439. ;
  440.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  441.         Macro
  442.         _GetEditionInfo
  443.             move.w              #$0422,D0
  444.             dc.w                $A82D
  445.         EndM
  446.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  447.         IMPORT_CFM_FUNCTION GetEditionInfo
  448.     ENDIF
  449.  
  450. ;
  451. ; pascal OSErr GoToPublisherSection(const EditionContainerSpec *container)
  452. ;
  453.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  454.         Macro
  455.         _GoToPublisherSection
  456.             move.w              #$0224,D0
  457.             dc.w                $A82D
  458.         EndM
  459.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  460.         IMPORT_CFM_FUNCTION GoToPublisherSection
  461.     ENDIF
  462.  
  463. ;
  464. ; pascal OSErr GetLastEditionContainerUsed(EditionContainerSpec *container)
  465. ;
  466.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  467.         Macro
  468.         _GetLastEditionContainerUsed
  469.             move.w              #$0226,D0
  470.             dc.w                $A82D
  471.         EndM
  472.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  473.         IMPORT_CFM_FUNCTION GetLastEditionContainerUsed
  474.     ENDIF
  475.  
  476. ;
  477. ; pascal OSErr GetStandardFormats(const EditionContainerSpec *container, FormatType *previewFormat, Handle preview, Handle publisherAlias, Handle formats)
  478. ;
  479.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  480.         Macro
  481.         _GetStandardFormats
  482.             move.w              #$0A28,D0
  483.             dc.w                $A82D
  484.         EndM
  485.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  486.         IMPORT_CFM_FUNCTION GetStandardFormats
  487.     ENDIF
  488.  
  489. ;
  490. ; pascal OSErr GetEditionOpenerProc(EditionOpenerUPP *opener)
  491. ;
  492.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  493.         Macro
  494.         _GetEditionOpenerProc
  495.             move.w              #$022A,D0
  496.             dc.w                $A82D
  497.         EndM
  498.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  499.         IMPORT_CFM_FUNCTION GetEditionOpenerProc
  500.     ENDIF
  501.  
  502. ;
  503. ; pascal OSErr SetEditionOpenerProc(EditionOpenerUPP opener)
  504. ;
  505.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  506.         Macro
  507.         _SetEditionOpenerProc
  508.             move.w              #$022C,D0
  509.             dc.w                $A82D
  510.         EndM
  511.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  512.         IMPORT_CFM_FUNCTION SetEditionOpenerProc
  513.     ENDIF
  514.  
  515. ;
  516. ; pascal OSErr CallEditionOpenerProc(EditionOpenerVerb selector, EditionOpenerParamBlock *PB, EditionOpenerUPP routine)
  517. ;
  518.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  519.         Macro
  520.         _CallEditionOpenerProc
  521.             move.w              #$052E,D0
  522.             dc.w                $A82D
  523.         EndM
  524.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  525.         IMPORT_CFM_FUNCTION CallEditionOpenerProc
  526.     ENDIF
  527.  
  528. ;
  529. ; pascal OSErr CallFormatIOProc(FormatIOVerb selector, FormatIOParamBlock *PB, FormatIOUPP routine)
  530. ;
  531.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  532.         Macro
  533.         _CallFormatIOProc
  534.             move.w              #$0530,D0
  535.             dc.w                $A82D
  536.         EndM
  537.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  538.         IMPORT_CFM_FUNCTION CallFormatIOProc
  539.     ENDIF
  540.  
  541. ;
  542. ; pascal OSErr NewSubscriberDialog(NewSubscriberReply *reply)
  543. ;
  544.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  545.         Macro
  546.         _NewSubscriberDialog
  547.             move.w              #$0232,D0
  548.             dc.w                $A82D
  549.         EndM
  550.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  551.         IMPORT_CFM_FUNCTION NewSubscriberDialog
  552.     ENDIF
  553.  
  554. ;
  555. ; pascal OSErr NewSubscriberExpDialog(NewSubscriberReply *reply, Point where, short expansionDITLresID, ExpDlgHookUPP dlgHook, ExpModalFilterUPP filter, void *yourDataPtr)
  556. ;
  557.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  558.         Macro
  559.         _NewSubscriberExpDialog
  560.             move.w              #$0B34,D0
  561.             dc.w                $A82D
  562.         EndM
  563.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  564.         IMPORT_CFM_FUNCTION NewSubscriberExpDialog
  565.     ENDIF
  566.  
  567. ;
  568. ; pascal OSErr NewPublisherDialog(NewPublisherReply *reply)
  569. ;
  570.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  571.         Macro
  572.         _NewPublisherDialog
  573.             move.w              #$0236,D0
  574.             dc.w                $A82D
  575.         EndM
  576.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  577.         IMPORT_CFM_FUNCTION NewPublisherDialog
  578.     ENDIF
  579.  
  580. ;
  581. ; pascal OSErr NewPublisherExpDialog(NewPublisherReply *reply, Point where, short expansionDITLresID, ExpDlgHookUPP dlgHook, ExpModalFilterUPP filter, void *yourDataPtr)
  582. ;
  583.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  584.         Macro
  585.         _NewPublisherExpDialog
  586.             move.w              #$0B38,D0
  587.             dc.w                $A82D
  588.         EndM
  589.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  590.         IMPORT_CFM_FUNCTION NewPublisherExpDialog
  591.     ENDIF
  592.  
  593. ;
  594. ; pascal OSErr SectionOptionsDialog(SectionOptionsReply *reply)
  595. ;
  596.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  597.         Macro
  598.         _SectionOptionsDialog
  599.             move.w              #$023A,D0
  600.             dc.w                $A82D
  601.         EndM
  602.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  603.         IMPORT_CFM_FUNCTION SectionOptionsDialog
  604.     ENDIF
  605.  
  606. ;
  607. ; pascal OSErr SectionOptionsExpDialog(SectionOptionsReply *reply, Point where, short expansionDITLresID, ExpDlgHookUPP dlgHook, ExpModalFilterUPP filter, void *yourDataPtr)
  608. ;
  609.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  610.         Macro
  611.         _SectionOptionsExpDialog
  612.             move.w              #$0B3C,D0
  613.             dc.w                $A82D
  614.         EndM
  615.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  616.         IMPORT_CFM_FUNCTION SectionOptionsExpDialog
  617.     ENDIF
  618.  
  619.     ENDIF ; __EDITIONS__ 
  620.  
  621.